Top 10k strings from Obs Prog. (19xx)(-)(dk).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /
Back to the directory listing
6 "OBS PROG"
3 ,ta;"R.A.: ";rh;" Hz Dekl.:";dh;" Hz "
3 )*sds/3600
2 u$;" "":";
2 rr=rr+rb*rk*rh*fk*(fra-gfra)+(fra-gfra)/180000
2 o$(l)=o$(l+1
2 l$(l)=l$(l+1
2 koordinater
2 a$="")+(a$
2 ;"uto. kontrol "
2 *db*dk*dh*fk*(fra-gfra):
2 );("Dekl.
2 (mdd-dd)<1
2 "Nr. ? (0:Tilbage)";n:
1 ttelse","6:Lagring","7:Optage","8:Blanding","9:Manuel kontrol"
1 ttelse"'"4:Menu"'t:
1 ta;"Tid? Tim.: ";T;" Min.: ";M;" Sek.: ";s
1 ta;"R.A.?
1 ta;"Dekl.?
1 t=fra/3600
1 t=(rr+1e-7
1 t$(j)=o$(j):
1 styring af kikkerten
1 stjerne-hastighed
1 s(l)=s(l+1
1 s(l)<s(l+1
1 s(h)=o(h,2
1 s(h)=o(h,1
1 s$(l)=s$(l+1
1 s$(l)<s$(l+1
1 s$(h)=o$(h):
1 s$(h)=l$(h):
1 rs;""" "
1 rr=srt+srm/60
1 rm));"""";
1 rm));""" ";
1 rb=(arb1<arb2)-(arb1>arb2):
1 o(l,c)=o(l+1
1 o$(n)=(o$(n)
1 o$(j)=t$(j-n+1
1 o$(j)=o$(j+1
1 o$(h)=s$(h):
1 mrr=srt+srm/60
1 mrr<rr)+mrr-rr)<1
1 m$(j)=l$(j):
1 l$(n)=(l$(n)
1 l$(j)=m$(j-n+1
1 l$(j)=l$(j+1
1 l$(h)=s$(h):
1 l koordinater
1 l R.A. : ";
1 l Dekl.: ";:
1 karakterer (gradtegn
1 fra=fra/50
1 ds;""" "
1 dm));"""";
1 dm));""" "
1 db=(mdd>dd)-(dd>mdd):
1 d$(w)+q,s:
1 arb2=mrr-rr:
1 arb2=arb2+(24
1 arb1=rr-mrr:
1 arb1=arb1+(24
1 a$="4")+(l$(l)
1 Udskrivning af tid
1 Udskrivning af
1 Udskrivning
1 Subrutine:indstilling
1 Program til manuel
1 Overskrivning
1 Opfyldning af tomme
1 Observationsprogram
1 Numerisk sortering
1 Max-hastighed eller
1 Koordinater
1 For 200 Hz
1 Finding af dataslut
1 Brugerdefinerede
1 Alfanumerisk sortering
1 ;"p:Obs.-prog.";
1 ;"anuel kontrol":
1 93->85,29->21
1 ,ta;(" 10 Hz
1 ,ta;"k:Start koor.";
1 ,ta;"i:Ur-indstil.";
1 ,ta;"Typ:";l$(f);" Obj:";o$(f):
1 ,ta;"Dekl. : ";("-"
1 +(a$="1"):
1 *highp)/256
1 );("200 Hz
1 )+(srt+srm/60
1 (pfr/65536
1 (pfr-low2*256
1 (pfr-65536
1 (mrr-rr)<1
1 "Tryk ENTER el.STOP ";b$:
1 "Startnr. ? ";snr
1 "Start nr. ? (0 for menu) ? ";snr:
1 "Sortering efter :"''"1:R.A."'"2:Dekl."'"3:Kommentar"'"4:Type"'"5:Menu"''a$:
1 "Objekttype: ";a$:
1 "Nr. ? (0:Tilbage)";nr:
1 "Menu:m ";a$:
1 "Kommentar : ";a$:
1 "Ikke mere plads !!":
1 ";srs;"""";" ";sdg;"
1 ";sds;"""";" ";l$(n);" ";o$(n)
1 "1:Skrivning","2:Udskrivning","3:Retning","4:Sortering","5:Igangs
1 "1:Overskrivning"'"2:Sletning"'"3:Inds
1 Dekl. Obj. Kom. "